home *** CD-ROM | disk | FTP | other *** search
/ Aminet 50 / Aminet 50 (2002)(GTI - Schatztruhe)[!][Aug 2002].iso / Aminet / text / print / HP_Deskjet400C.lha / Install_Driver < prev    next >
Text File  |  2002-06-11  |  2KB  |  59 lines
  1. ; Driver install script
  2. ; PJ Hutchison 1.0 11/6/02
  3.  
  4. (User 1) ; Average user
  5.  
  6. (Set #cpu  
  7.   (AskChoice (PROMPT "Select Processor version") 
  8.              (HELP "Select which processor version to use")
  9.              (CHOICES "68000" "68020" "68040")
  10.              (DEFAULT 0)
  11.              )
  12. )
  13.  
  14. ; Copy CPU version of driver to t:Driver
  15.  
  16. (Select #cpu
  17.   (Copyfiles (Source "HP_Deskjet_400C.000") (Dest "t:") (NewName "Driver") (NoGauge))
  18.   (Copyfiles (Source "HP_Deskjet_400C.020") (Dest "t:") (NewName "Driver") (NoGauge))
  19.   (Copyfiles (Source "HP_Deskjet_400C.040") (Dest "t:") (NewName "Driver") (NoGauge))
  20. )
  21.  
  22. ; Select a model from list
  23. (Set #Model  
  24.   (AskChoice (Prompt "Which HP Deskjet Model?")
  25.              (Help "Select a Printer")
  26.              (Choices "Deskjet 400C" "Deskjet 400L" "Deskjet 440C" "Deskjet 460C"
  27.                "Deskjet 480C" )
  28.              (Default 0)
  29.   )
  30. )
  31.  
  32. ; Copy selected model to devs:printers
  33.  
  34. (Select #Model 
  35.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_400C"))
  36.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_400L"))
  37.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_440C"))
  38.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_460C"))
  39.   (CopyFiles (Source "t:Driver") (Dest "devs:Printers") (NewName "HP_Deskjet_480C"))
  40. )
  41.  
  42. ; Launch Printer Preferences
  43.  
  44. (if ( = (AskChoice (Prompt "Do you wish to change Printer Prefs?")
  45.                (Help "Printer Prefs")
  46.                (Choices "Yes" "No")) 0)
  47.     (Run "Sys:Prefs/Printer")
  48. )
  49.  
  50. (if ( = (AskChoice (Prompt "Do you wish to change PrinterGfx Prefs?")
  51.                (Help "PrinterGfx Prefs")
  52.                (Choices "Yes" "No")) 0)
  53.     (Run "Sys:Prefs/PrinterGfx")
  54. )
  55.  
  56. (EXIT "Your Printer Driver is now installed in Devs:Printers")
  57.  
  58. ; End of script
  59.